home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / storage / function / scsi / add / gen.gra < prev    next >
Encoding:
Text File  |  1994-08-18  |  3.5 KB  |  57 lines
  1. *******************************************************************************
  2. ** GEN.GRA - CALLS FOR GENDRV.SYS 
  3. *******************************************************************************
  4. @IMPORT GLOBAL.GRA
  5. *******************************************************************************
  6. ** Open the generic test driver - GENDRV.SYS
  7. *******************************************************************************
  8. GEN_OPEN         $DLL=GEN                                       \
  9.                  $FUNC=@gen_open$qr8Kwd_List                    \
  10.                  $EXPECTED                                      \
  11.                  GENDRVHANDLE=NUM
  12. *******************************************************************************
  13. ** Open (attachdd) the driver under test.     
  14. *******************************************************************************
  15. GEN_OPENDRIVER   $DLL=GEN                                       \
  16.                  $FUNC=@gen_OpenDriver$qr8Kwd_List              \
  17.                  TESTDRIVER=STRING                              \
  18.                  GENDRVHANDLE=NUM                               \
  19.                  $EXPECTED                                      \
  20.                  TESTDRIVEREP=NUM                               \
  21.                  DEVHELPEP=NUM
  22. *******************************************************************************
  23. ** Calls devhelp function GetDOSVar.  
  24. *******************************************************************************
  25. GEN_GETDOSVAR    $DLL=GEN                                       \
  26.                  $FUNC=@gen_GetDosVar$qr8Kwd_List               \
  27.                  GENDRVHANDLE=NUM                               \
  28.                  VARNUMBER=NUM                                  \
  29.                  VARMEMBER=NUM                                  \
  30.                  KVARSIZE=NUM                                   \
  31.                  $EXPECTED                                      \
  32.                  KVAR=NUM
  33. *******************************************************************************
  34. ** Calls devhelp function SendEvent.  
  35. *******************************************************************************
  36. GEN_SENDEVENT    $DLL=GEN                                       \
  37.                  $FUNC=@gen_SendEvent$qr8Kwd_List               \
  38.                  GENDRVHANDLE=NUM                               \
  39.                  EVENT=NUM                                      \
  40.                  ARGUMENT=NUM
  41. *******************************************************************************
  42. ** Calls driver under test entry point with the given register values.
  43. *******************************************************************************
  44. GEN_CALLREG      $DLL=GEN                                       \
  45.                  $FUNC=@gen_CallReg$qr8Kwd_List                 \
  46.                  GENDRVHANDLE=NUM                               \
  47.                  AXREG=NUM                                      \
  48.                  BXREG=NUM                                      \
  49.                  CXREG=NUM                                      \
  50.                  DXREG=NUM                                      
  51. ******************************************************************************
  52. ** Closes test device driver.
  53. ******************************************************************************
  54. GEN_CLOSE        $DLL=GEN                                       \
  55.                  $FUNC=@gen_close$qr8Kwd_List                   \
  56.                  GENDRVHANDLE=NUM                               
  57.